home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 23 / AMIGAplus Sonderheft 23 (2000)(Falke)(DE)[!].iso / PublicDomain / Anwendungen / TechnoIO_Install / Install < prev    next >
Text File  |  1999-12-07  |  3KB  |  118 lines

  1.  
  2. ; ****************************************
  3. ; *                                      *
  4. ; *    TechnoIO-Installationsskript      *
  5. ; *                                      *
  6. ; *  $VER: 0.2 (07.12.99) by J.Reinert   *
  7. ; *                                      *
  8. ; ****************************************
  9.  
  10. ; *************************************************************************
  11. ; Texte zuweisen
  12. ; *************************************************************************
  13.  
  14. (set #AskDestDirMsg "Please select Destination for the TechnoIO-Drawer")
  15. (set #CopyPrgs "Copy Programs")
  16. (set #modifyuserstartup "add Entry to User-Startup")
  17.  
  18.  
  19. (if (= @language "deutsch")
  20.   (
  21.     (set #AskDestDirMsg "Wählen Sie bitte das Ziel für die TechnoIO-Schublade")
  22.     (set #CopyPrgs "Programme kopieren")
  23.     (set #modifyuserstartup "Eintrag in User-Startup einfügen")
  24.   )
  25. )
  26.  
  27. ; *************************************************************************
  28. ; Beginn der Installation
  29. ; *************************************************************************
  30.  
  31. (complete 0)
  32.  
  33. (welcome)
  34.  
  35. ; *************************************************************************
  36. ; Zielverzeichnis auswählen lassen
  37. ; *************************************************************************
  38.  
  39. (set #DestDir
  40.   (askdir
  41.     (prompt  #AskDestDirMsg)
  42.     (help    #askdir-help)
  43.     (default @default-dest)
  44.   )
  45. )
  46.  
  47. (if (<> #DestDir "")
  48.   (
  49.     (complete 5)
  50.     (set #DestDir (tackon #DestDir "TechnoIO"))
  51.     (makedir #DestDir (infos))
  52.  
  53. ; *************************************************************************
  54. ; Kopieren der Programme
  55. ; *************************************************************************
  56.  
  57.     (copyfiles (prompt #CopyPrgs)
  58.                (source "Software")
  59.                (dest #DestDir)
  60.                (help @copyfiles-help)
  61.                (all)
  62.                (confirm "EXPERT")
  63.     )
  64.   
  65.   
  66. ; *************************************************************************
  67. ; Suchpfad in User-Startup einbinden
  68. ; *************************************************************************
  69.  
  70.     (set cmd (cat "Path "#DestDir"/Commands "#DestDir"/ARexx "#DestDir"/Batch add"))
  71.     
  72.     (startup "TechnoIO"
  73.              (prompt (cat #modifyuserstartup"\n\n"cmd))
  74.              (command cmd)
  75.              (help "")
  76.     )
  77.   
  78.   
  79.   
  80.   )
  81. )
  82.  
  83. (complete 80)
  84.  
  85. ; *************************************************************************
  86. ; Kopieren der Librarys
  87. ; *************************************************************************
  88.  
  89. (copylib  (source "Libs/wizard.library")
  90.           (dest "Libs:")
  91. )
  92.  
  93. (copylib  (source "Libs/TechnoIO.library")
  94.           (dest "Libs:")
  95. )
  96.  
  97. (complete 95)
  98.  
  99. ; *************************************************************************
  100. ; Aktuelles Verzeichnis setzen
  101. ; *************************************************************************
  102.  
  103. (if (= #DestDir "")
  104.   (
  105.     (set @default-dest "")
  106.   )
  107.   (
  108.     (set @default-dest #DestDir)
  109.   )
  110. )
  111.  
  112. (complete 100)
  113.  
  114. ; *************************************************************************
  115. ; Ende der Installation
  116. ; *************************************************************************
  117.  
  118.